perm filename E.SAI[2,TES] blob
sn#009892 filedate 1972-07-17 generic text, type T, neo UTF8
00100 BEGIN COMMENT THIS GETS "DRYROT AT EVAR". WORKS IN OLD SAIL. WHY? ;
00200 STRING PROCEDURE EE; RETURN(NULL) ;
00300 RECURSIVE PROCEDURE PASS ; COMMENT IT WORKS IF NOT "RECURSIVE" ;
00400 BEGIN
00500 STRING ARRAY ACTUAL[1:2] ; COMMENT IT WORKS IF "ACTUAL" & "EE" ARE "INTEGER" ;
00600 ACTUAL[1] ← EE; COMMENT IT WORKS IF "NULL" INSTEAD OF "EE",
00700 IT DOESN'T WORK EVEN IF "EE" HAS ARGUMENTS ;
00800 END ;
00900 END